#Mappa edifici
geojson_novazzano <- geojson_data %>%
filter(municipalityName == "Novazzano")
# Visualizza i dati filtrati su una mappa
mapview(geojson_novazzano, zcol = "buildingCategory")
geojson_lugano <- geojson_data %>%
filter(municipalityName == "Lugano")
# Visualizza i dati filtrati su una mappa
mapview(geojson_lugano, zcol = "buildingStatus")